home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 1 (Walnut Creek)
/
Aminet - June 1993 [Walnut Creek].iso
/
aminet
/
util
/
misc
/
zkick301.lzh
/
mmu.i
< prev
next >
Wrap
Text File
|
1990-08-17
|
2KB
|
115 lines
;======================================================================
;
; Borrowed From:
;
; SetCPU V1.60
; by Dave Haynie, April 13, 1990
;
;======================================================================
_PMOVE macro
ifc '\1','tc'
ifc '\2','(sp)'
dc.w $f017 ; PMOVE tc,(sp)
dc.w $4200
mexit
endc
ifc '\2','(a0)'
dc.w $f010 ; PMOVE tc,(a0)
dc.w $4200
mexit
endc
endc
ifc '\1','crp'
ifc '\2','(a0)'
dc.w $f010 ; PMOVE crp,(a0)
dc.w $4e00
mexit
endc
endc
ifc '\1','(a0)'
ifc '\2','crp'
dc.w $f010 ; PMOVE (a0),crp
dc.w $4c00
mexit
endc
ifc '\2','tc'
dc.w $f010 ; PMOVE (a0),tc
dc.w $4000
mexit
endc
endc
ifc '\1','(a1)'
ifc '\2','crp'
dc.w $f011 ; PMOVE (a1),crp
dc.w $4c00
mexit
endc
endc
endm
_PFLUSHA macro
dc.w $f000
dc.w $2400
endm
_MOVEC macro
ifc '\1','cacr'
ifc '\2','d0'
dc.w $4e7a ; MOVEC cacr,d0
dc.w $0002
mexit
endc
ifc '\2','d1'
dc.w $4e7a ; MOVEC cacr,d1
dc.w $1002
mexit
endc
endc
ifc '\2','cacr'
ifc '\1','d0'
dc.w $4e7b ; MOVEC d0,cacr
dc.w $0002
mexit
endc
ifc '\1','d1'
dc.w $4e7b ; MOVEC d1,cacr
dc.w $1002
mexit
endc
endc
ifc '\1','vbr'
ifc '\2','d0'
dc.w $4e7a ; MOVEC vbr,d0
dc.w $0801
mexit
endc
endc
endm
CIB_ENABLE EQU 0
CIB_FREEZE EQU 1
CIB_ENTRY EQU 2
CIB_CLEAR EQU 3
CIB_BURST EQU 4
CDB_ENABLE EQU 8
CDB_FREEZE EQU 9
CDB_ENTRY EQU 10
CDB_CLEAR EQU 11
CDB_BURST EQU 12
CDB_WALLOC EQU 13
CIB_ENABLE40 EQU 15
CDB_ENABLE40 EQU 31
AFB_68030 EQU 2
AFB_68040 EQU 3
AFB_68882 EQU 5
ATNFLGS EQU $129
ANYCREG EQU $00dff010
BOGUSMMU EQU $ffffffff